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pascal OSErr FSpLocationFromFtillP%th( short f ullPa thLengt h , 
const void *fullPath, 

FSSpec +speo) j. 



AliasHandle alias; 

OSErr result; , 1 

Boolean easChanged ; | 910 | 

Str32 nullString; 1 

/* Create a minimal alias from the full pathname +/ 

null String! 0J » 0; /* null string to indicate no zone or server name */ 
result « HewAliastfinimalFromF fullPatn, nullString, 

nullString, &alias) ; 
if ( result «» noErr ) 

{ j- 
/* Let the Alias Manager resolve the alias. */ 
result m B*solveAlias(OTJIJL , alias, spec, &wasChanged) ; 

/* work around Alias Hgr sloppy volume matching hug */ j 
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/* invalidate wrong FSSpec */ 

spec- > par ID m 0; j 
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return ( result ); I 
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To: <star logo-user sgmedl a. ni t.edu> 




■ ▼ 


Hi everyone, 




'a 



The second beta of St car Logo 1 .9 is now aval table.! Our original 
version of StarLogo, which runs only on Macintosh computers, has been 
renamed rtocStarLogo. This version of StarLogo is implemented in Java 
and is able to run on many different platforms. Since our first beta 
release, u*e have been hard at work adding ©any nee features and 
fixing bugs. Me have also expanded our gevelopment efforts to include 
rtocOS, Unix and OS/2, so this new StarLogo should run pretty well on 
many ecre computers than before* 

You can download this second beta version of StarLogo from the StarLogo 
site <http://www.med ia-eit.edu/starlogo>. See the Ueb site for more 
information. 



look forward to hearing your 
The StarLogo Development Team 



commmnts and suggestions! 



Ue include the RERDflE that 
remainder of this letter. 

STARLOGO (Beta 2) 
September 22, 1909 



comes with the StarLogo download in the 



I. INTRODUCTION 



Uelcome to the second beta release of StarLogo, a totally new s^trsion 
of StarLogo. Our original version of StarLogo, which runs only on 
Macintosh computers, has been renamed rtocStarLogo. Rs with 
riacStarLogo, this new version is designed to help you model and 
explore the workings of decentralized systems, such as bird flocks, 
traffic jams, and market economies (see 
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// - 

// • Assign ( long double , Const StringPtr, BesXDT ) 

// 

// Assignment from % long double using a formatting string and the \ 
// resource ID of a Humber Parts table j 

" i 
// This function allows you to specify number formatting strings using * 

//a standard HumberParts table , and then obtain format records that \ 

// use the local System HumberParts as specified by the user. |. 

*' \ 
// For example , assuming that 'BbPt' resource 200 is a standard US \ 

// HumberParts table, \ 

// 

// myString.AssignC1234.56, M \p### ,###.##" , 200); 
// 

// On a machine with US number formatting , my String will be "1,234.56 
// Qna machine with Dani sh numbe r formatting, my String will be 
// "1.234,56" ( Danish use] 1602 | the thousands separator and ' , ' as 
// the decimal point). 
// 

// However, if you use the Assignf) routine above: 
// 

// myString.AssignC1234.56, " \p### ,###.##") ; 
// 

// This will correctly set my String to "1,234.56" on a machine with 
//US number formatting. But will not work for Danish number formatting, 
// where the format string is invalid. 
// 

// utFormatFesult may be nil. If so, not format result is passed back. 

L String* 
L String: : Assign( 

long double incumber, 

Const StringPtr inForma t String , 

ResIDT inlfumberPartsID , 

FormatKesultType* out Forma tResult) 

Handle partsH ■ : : Get Resource <ResType_HumberParts, inHumberPartsID) ; 
ThrowIfHesFail.(partsH) ; 
StHandleLooker lock(partsH) ; W 

▼ 

" ■ ' A 
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"0 Q a LString.cp CD 

|gj CodeWarrior source file 54.0K ^ B 

// — - ^ 

// • Assign ( long double. Const StringPtr, ResIOT ) ( 



// Assignment from % long double using a formatting string and the 
// r source ID of a Number Parts table 
// 

// This function allows you to specify number formatting strings using ^ 
//a standard Ifumber Parts table, and then obtain format records that 
// use the local System Humber Parts as specified by the user. 

// F r example, assuming that *HoPV resource 200 is a standard VS 
// Humber Parts table, . . 

// 

// my String . Assign( 1 234 . 56 , -\p*## , 200); 

// On a machine with US I Scandinavia «y String will be - 1,234 ,56 V 

// On a machine with Bar — .~*g, myString will be 

// "1.234 ,56* { P&rdsh use ' V i tnbusands separator and 



1603 



// the decimal point) 
// 

// However, if you use the &ssign( ) routine above: 

" \ 
// my String. Assign( 1234. 56, ~\p*## ) ; j 

// 

// This will correctly set myString to " 1,234. 56" on a machine with 

// VS number formatting. But will not work for Danish number formatting, \ 

// where the format string is invalid. 

// , ^ _ 

// outFor mat Result may be nil. If so, not format result is passed back. 

LStringfic 
L String: :Assign( 

long double inHumber, 

C nstStringPtr inFor mat String, 

ResIDT inHumberFartsID , 

FormatResultType* outFormatResult) 

^ Handle partsH = :: Get Resource (ResTypeJfumber Parts , inFumberPartsID) ; 
Throwlf ResFail_(partsH) ; 
StHandleLocker lock ( par tsH) ; 



v 
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